﻿' LibWowArmory
' by Ronald M. Clifford (roncli@roncli.com)
'
' This source code is released under the GNU Library General Public License (LGPL) Version 2.1.

Imports Newtonsoft.Json
Imports System.Collections.Generic

Namespace roncliProductions.LibWowArmory.CalendarMonthWorldSchema

    Public Class [event]

        Private strCalendarType As String
        Private intCalendarTypeID As Integer
        Private strDescription As String
        Private lngEnd As Long
        Private strIcon As String
        Private strKey As String
        Private intPriority As Integer
        Private lngStart As Long
        Private strSummary As String

        <JsonProperty("calendarType")> Public Property calendarType() As String
            Get
                Return strCalendarType
            End Get
            Set(ByVal value As String)
                strCalendarType = value
            End Set
        End Property

        <JsonProperty("calendarTypeId")> Public Property calendarTypeId() As Integer
            Get
                Return intCalendarTypeID
            End Get
            Set(ByVal value As Integer)
                intCalendarTypeID = value
            End Set
        End Property

        <JsonProperty("description")> Public Property description() As String
            Get
                Return strDescription
            End Get
            Set(ByVal value As String)
                strDescription = value
            End Set
        End Property

        <JsonProperty("end")> Public Property [end]() As Long
            Get
                Return lngEnd
            End Get
            Set(ByVal value As Long)
                lngEnd = value
            End Set
        End Property

        <JsonProperty("icon")> Public Property icon() As String
            Get
                Return strIcon
            End Get
            Set(ByVal value As String)
                strIcon = value
            End Set
        End Property

        <JsonProperty("key")> Public Property key() As String
            Get
                Return strKey
            End Get
            Set(ByVal value As String)
                strKey = value
            End Set
        End Property

        <JsonProperty("priority")> Public Property priority() As Integer
            Get
                Return intPriority
            End Get
            Set(ByVal value As Integer)
                intPriority = value
            End Set
        End Property

        <JsonProperty("start")> Public Property start() As Long
            Get
                Return lngStart
            End Get
            Set(ByVal value As Long)
                lngStart = value
            End Set
        End Property

        <JsonProperty("summary")> Public Property summary() As String
            Get
                Return strSummary
            End Get
            Set(ByVal value As String)
                strSummary = value
            End Set
        End Property

    End Class

End Namespace